﻿
Imports xmlctrl

Public Class buildInfoPage
    Inherits cacheControlProcessor

    Public Const _pathidentity As String = "/buildinfo"

    Protected Overrides Function normalretiredticks() As Int64
        'need not to retire
        Return -1
    End Function

    Protected Overrides Function debugmodeRetiredTicks() As Int64
        'need not to retire
        Return -1
    End Function

    Public Overrides Function pathidentity() As String
        Return _pathidentity
    End Function

    Protected Overloads Overrides Function processImpl(ByVal context As httpContext _
                                                       , ByRef control As xmlcontrol) As Boolean
        control = context.createControl(New xmlcontrol())
        control.text = buildInfo2
        Return True
    End Function
End Class
